/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / misc / lissajous / !Lissajous / WimpLib

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 39 f4 20 3e 20 | 3c 42 45 64 24 44 69 72 |...9. > |<BEd$Dir|
|00000010| 3e 2e 57 69 6d 70 4c 69 | 62 20 76 31 2e 31 32 20 |>.WimpLi|b v1.12 |
|00000020| 3a 20 47 65 6e 65 72 61 | 6c 20 57 69 6d 70 20 50 |: Genera|l Wimp P|
|00000030| 72 6f 63 65 64 75 72 65 | 73 0d 00 14 1c f4 20 a9 |rocedure|s..... .|
|00000040| 20 4d 69 6b 65 20 43 75 | 72 6e 6f 77 20 4d 61 79 | Mike Cu|rnow May|
|00000050| 20 31 39 39 31 0d 00 1e | 15 dd f2 57 69 6d 70 49 | 1991...|...WimpI|
|00000060| 6e 69 74 28 6e 24 2c 53 | 25 29 0d 00 28 2b c8 99 |nit(n$,S|%)..(+..|
|00000070| 22 57 69 6d 70 5f 49 6e | 69 74 69 61 6c 69 73 65 |"Wimp_In|itialise|
|00000080| 22 2c 32 30 30 2c 26 34 | 42 35 33 34 31 35 34 2c |",200,&4|B534154,|
|00000090| 6e 24 2b bd 30 0d 00 32 | 3e de 20 62 25 20 53 25 |n$+.0..2|>. b% S%|
|000000a0| 2c 6d 62 25 20 26 34 30 | 30 3a 6d 65 6e 75 66 72 |,mb% &40|0:menufr|
|000000b0| 65 65 25 3d 6d 62 25 3a | 6d 65 6e 75 65 6e 64 25 |ee%=mb%:|menuend%|
|000000c0| 3d 6d 62 25 2b 26 34 30 | 30 3a 74 61 73 6b 6e 24 |=mb%+&40|0:taskn$|
|000000d0| 3d 6e 24 0d 00 3c 05 e1 | 0d 00 46 05 3a 0d 00 50 |=n$..<..|..F.:..P|
|000000e0| 1a dd a4 49 63 6f 6e 54 | 61 73 6b 28 6e 24 29 3a |...IconT|ask(n$):|
|000000f0| ea 20 53 25 2c 54 25 0d | 00 5a 37 53 25 3d 8e 22 |. S%,T%.|.Z7S%=."|
|00000100| 3c 4f 62 65 79 24 44 69 | 72 3e 2e 21 53 70 72 69 |<Obey$Di|r>.!Spri|
|00000110| 74 65 73 22 3a 54 25 3d | a2 23 53 25 2b 31 36 3a |tes":T%=|.#S%+16:|
|00000120| d9 23 53 25 3a e7 20 53 | 25 3d 30 20 3d 30 0d 00 |.#S%:. S|%=0 =0..|
|00000130| 64 1a de 20 53 25 20 54 | 25 3a 21 53 25 3d 54 25 |d.. S% T|%:!S%=T%|
|00000140| 3a 53 25 21 38 3d 31 36 | 0d 00 6e 1c c8 99 20 22 |:S%!8=16|..n... "|
|00000150| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 26 31 30 |OS_Sprit|eOp",&10|
|00000160| 39 2c 53 25 0d 00 78 32 | c8 99 20 22 4f 53 5f 53 |9,S%..x2|.. "OS_S|
|00000170| 70 72 69 74 65 4f 70 22 | 2c 26 31 30 41 2c 53 25 |priteOp"|,&10A,S%|
|00000180| 2c 22 3c 4f 62 65 79 24 | 44 69 72 3e 2e 21 53 70 |,"<Obey$|Dir>.!Sp|
|00000190| 72 69 74 65 73 22 0d 00 | 82 45 21 62 25 3d 2d 31 |rites"..|.E!b%=-1|
|000001a0| 3a 62 25 21 34 3d 30 3a | 62 25 21 38 3d 30 3a 62 |:b%!4=0:|b%!8=0:b|
|000001b0| 25 21 31 32 3d 53 25 21 | 33 32 2a 31 36 2b 34 3a |%!12=S%!|32*16+4:|
|000001c0| 62 25 21 31 36 3d 53 25 | 21 33 36 2a 34 2b 34 3a |b%!16=S%|!36*4+4:|
|000001d0| 62 25 21 32 30 3d 26 32 | 31 30 32 0d 00 8c 28 de |b%!20=&2|102...(.|
|000001e0| 20 62 25 21 32 34 20 28 | a9 6e 24 2b 31 29 3a 24 | b%!24 (|.n$+1):$|
|000001f0| 28 62 25 21 32 34 29 3d | 6e 24 3a 62 25 21 32 38 |(b%!24)=|n$:b%!28|
|00000200| 3d 53 25 0d 00 96 2c 62 | 25 21 33 32 3d a9 6e 24 |=S%...,b|%!32=.n$|
|00000210| 2b 31 3a c8 99 22 57 69 | 6d 70 5f 43 72 65 61 74 |+1:.."Wi|mp_Creat|
|00000220| 65 49 63 6f 6e 22 2c 2c | 62 25 20 b8 20 54 25 0d |eIcon",,|b% . T%.|
|00000230| 00 a0 07 3d 54 25 0d 00 | aa 05 3a 0d 00 b4 26 dd |...=T%..|..:...&.|
|00000240| f2 57 69 6d 70 43 6c 4d | 3a c8 99 22 57 69 6d 70 |.WimpClM|:.."Wimp|
|00000250| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c b9 3a |_CreateM|enu",,.:|
|00000260| e1 0d 00 be 05 3a 0d 00 | c8 28 dd a4 57 69 6d 70 |.....:..|.(..Wimp|
|00000270| 4d 65 6e 75 28 68 61 6e | 64 6c 65 25 2c 6d 65 6e |Menu(han|dle%,men|
|00000280| 75 24 2c 6d 65 6e 75 74 | 69 74 6c 65 24 29 0d 00 |u$,menut|itle$)..|
|00000290| d2 34 e7 20 6d 65 6e 75 | 66 72 65 65 25 2b 32 38 |.4. menu|free%+28|
|000002a0| 20 3e 20 6d 65 6e 75 65 | 6e 64 25 20 8c 20 85 20 | > menue|nd% . . |
|000002b0| 30 2c 22 4d 65 6e 75 20 | 61 72 65 61 20 66 75 6c |0,"Menu |area ful|
|000002c0| 6c 22 0d 00 dc 32 ea 20 | 68 25 2c 69 25 2c 6d 25 |l"...2. |h%,i%,m%|
|000002d0| 2c 77 25 2c 79 25 2c 69 | 74 65 6d 24 3a 68 25 3d |,w%,y%,i|tem$:h%=|
|000002e0| 34 3a 6d 65 6e 75 70 74 | 72 25 3d 6d 65 6e 75 66 |4:menupt|r%=menuf|
|000002f0| 72 65 65 25 0d 00 e6 18 | 24 6d 65 6e 75 70 74 72 |ree%....|$menuptr|
|00000300| 25 3d 6d 65 6e 75 74 69 | 74 6c 65 24 0d 00 f0 3c |%=menuti|tle$...<|
|00000310| 6d 65 6e 75 70 74 72 25 | 3f 31 32 3d 37 3a 6d 65 |menuptr%|?12=7:me|
|00000320| 6e 75 70 74 72 25 3f 31 | 33 3d 32 3a 6d 65 6e 75 |nuptr%?1|3=2:menu|
|00000330| 70 74 72 25 3f 31 34 3d | 37 3a 6d 65 6e 75 70 74 |ptr%?14=|7:menupt|
|00000340| 72 25 3f 31 35 3d 31 30 | 0d 00 fa 3e 6d 65 6e 75 |r%?15=10|...>menu|
|00000350| 70 74 72 25 21 32 30 3d | 34 34 3a 6d 65 6e 75 70 |ptr%!20=|44:menup|
|00000360| 74 72 25 21 32 34 3d 30 | 3a 6d 65 6e 75 70 74 72 |tr%!24=0|:menuptr|
|00000370| 25 2b 3d 32 38 3a 77 25 | 3d a9 6d 65 6e 75 74 69 |%+=28:w%|=.menuti|
|00000380| 74 6c 65 24 2d 32 0d 01 | 04 39 f5 20 69 74 65 6d |tle$-2..|.9. item|
|00000390| 24 3d a4 6d 70 61 72 28 | 22 2c 22 29 3a f2 6d 65 |$=.mpar(|","):.me|
|000003a0| 6e 75 69 74 65 6d 28 69 | 74 65 6d 24 29 3a 68 25 |nuitem(i|tem$):h%|
|000003b0| 2b 3d 34 34 3a fd 20 69 | 74 65 6d 24 3d 22 22 0d |+=44:. i|tem$="".|
|000003c0| 01 0e 28 6d 25 3d 6d 65 | 6e 75 66 72 65 65 25 3a |..(m%=me|nufree%:|
|000003d0| 6d 25 21 31 36 3d 28 77 | 25 2a 38 2b 36 29 2a 32 |m%!16=(w|%*8+6)*2|
|000003e0| 3a 68 25 2d 3d 34 34 0d | 01 18 1f c8 99 22 57 69 |:h%-=44.|....."Wi|
|000003f0| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|00000400| 6f 22 2c 2c 62 25 0d 01 | 22 12 e7 20 68 61 6e 64 |o",,b%..|".. hand|
|00000410| 6c 65 25 3e 3d 30 20 8c | 0d 01 2c 26 20 20 20 e7 |le%>=0 .|..,&   .|
|00000420| 20 62 25 21 31 32 3d 2d | 32 20 8c 20 79 25 3d 68 | b%!12=-|2 . y%=h|
|00000430| 25 2b 39 32 20 8b 20 79 | 25 3d 62 25 21 34 0d 01 |%+92 . y|%=b%!4..|
|00000440| 36 28 20 20 20 c8 99 22 | 57 69 6d 70 5f 43 72 65 |6(   .."|Wimp_Cre|
|00000450| 61 74 65 4d 65 6e 75 22 | 2c 2c 6d 25 2c 21 62 25 |ateMenu"|,,m%,!b%|
|00000460| 2d 36 34 2c 79 25 0d 01 | 40 20 20 20 20 6d 65 6e |-64,y%..|@    men|
|00000470| 75 74 6f 70 25 3d 6d 25 | 3a 6d 65 6e 75 66 72 65 |utop%=m%|:menufre|
|00000480| 65 25 3d 6d 62 25 0d 01 | 4a 18 cc 20 6d 65 6e 75 |e%=mb%..|J.. menu|
|00000490| 66 72 65 65 25 3d 6d 65 | 6e 75 70 74 72 25 0d 01 |free%=me|nuptr%..|
|000004a0| 54 05 cd 0d 01 5e 07 3d | 6d 25 0d 01 68 05 3a 0d |T....^.=|m%..h.:.|
|000004b0| 01 72 15 dd f2 6d 65 6e | 75 69 74 65 6d 28 74 65 |.r...men|uitem(te|
|000004c0| 78 74 24 29 0d 01 7c 32 | e7 20 74 65 78 74 24 3d |xt$)..|2|. text$=|
|000004d0| 22 22 20 8c 20 6d 65 6e | 75 70 74 72 25 21 2d 32 |"" . men|uptr%!-2|
|000004e0| 34 3d 28 6d 65 6e 75 70 | 74 72 25 21 2d 32 34 29 |4=(menup|tr%!-24)|
|000004f0| 84 26 38 30 3a e1 0d 01 | 86 33 e7 20 6d 65 6e 75 |.&80:...|.3. menu|
|00000500| 70 74 72 25 2b 32 34 20 | 3e 20 6d 65 6e 75 65 6e |ptr%+24 |> menuen|
|00000510| 64 25 20 8c 20 85 20 30 | 2c 22 4d 65 6e 75 20 61 |d% . . 0|,"Menu a|
|00000520| 72 65 61 20 66 75 6c 6c | 22 0d 01 90 27 ea 69 25 |rea full|"...'.i%|
|00000530| 2c 69 31 25 2c 66 6c 67 | 25 2c 73 75 62 70 74 72 |,i1%,flg|%,subptr|
|00000540| 25 2c 4c 25 2c 49 25 3a | 66 6c 67 25 3d 26 30 30 |%,L%,I%:|flg%=&00|
|00000550| 0d 01 9a 12 69 25 3d a7 | 74 65 78 74 24 2c 22 3e |....i%=.|text$,">|
|00000560| 22 29 0d 01 a4 3d e7 20 | c2 74 65 78 74 24 2c 31 |")...=. |.text$,1|
|00000570| 29 3d 22 23 22 20 8c 20 | 74 65 78 74 24 3d c0 74 |)="#" . |text$=.t|
|00000580| 65 78 74 24 2c a9 74 65 | 78 74 24 2d 31 29 3a 66 |ext$,.te|xt$-1):f|
|00000590| 6c 67 25 2b 3d 26 30 32 | 3a 68 25 2b 3d 32 36 0d |lg%+=&02|:h%+=26.|
|000005a0| 01 ae 3d e7 69 25 3e 30 | 8c 73 75 62 70 74 72 25 |..=.i%>0|.subptr%|
|000005b0| 3d a0 c1 74 65 78 74 24 | 2c 69 25 2b 31 29 3a 74 |=..text$|,i%+1):t|
|000005c0| 65 78 74 24 3d c0 74 65 | 78 74 24 2c 69 25 2d 31 |ext$=.te|xt$,i%-1|
|000005d0| 29 8b 73 75 62 70 74 72 | 25 3d 2d 31 0d 01 b8 3b |).subptr|%=-1...;|
|000005e0| 6d 65 6e 75 70 74 72 25 | 21 30 3d 66 6c 67 25 3a |menuptr%|!0=flg%:|
|000005f0| 6d 65 6e 75 70 74 72 25 | 21 34 3d 73 75 62 70 74 |menuptr%|!4=subpt|
|00000600| 72 25 3a 6d 65 6e 75 70 | 74 72 25 21 38 3d 26 30 |r%:menup|tr%!8=&0|
|00000610| 37 30 30 30 30 32 31 0d | 01 c2 13 e7 c0 74 65 78 |7000021.|.....tex|
|00000620| 74 24 2c 31 29 3d 22 24 | 22 8c 0d 01 cc 13 20 21 |t$,1)="$|"..... !|
|00000630| 6d 65 6e 75 70 74 72 25 | 2b 3d 26 30 34 0d 01 d6 |menuptr%|+=&04...|
|00000640| 15 20 6d 65 6e 75 70 74 | 72 25 21 38 2b 3d 26 31 |. menupt|r%!8+=&1|
|00000650| 30 38 0d 01 e0 13 20 69 | 25 3d a7 74 65 78 74 24 |08.... i|%=.text$|
|00000660| 2c 22 28 22 29 0d 01 ea | 34 20 e7 69 25 3e 30 8c |,"(")...|4 .i%>0.|
|00000670| 4c 25 3d bb c1 74 65 78 | 74 24 2c 69 25 2b 31 29 |L%=..tex|t$,i%+1)|
|00000680| 3a 74 65 78 74 24 3d c0 | 74 65 78 74 24 2c 69 25 |:text$=.|text$,i%|
|00000690| 2d 31 29 8b 4c 25 3d 31 | 32 0d 01 f4 1b 20 6d 65 |-1).L%=1|2.... me|
|000006a0| 6e 75 70 74 72 25 21 31 | 32 3d a0 c1 74 65 78 74 |nuptr%!1|2=..text|
|000006b0| 24 2c 32 29 0d 01 fe 22 | 20 6d 65 6e 75 70 74 72 |$,2)..."| menuptr|
|000006c0| 25 21 31 36 3d 2d 31 3a | 6d 65 6e 75 70 74 72 25 |%!16=-1:|menuptr%|
|000006d0| 21 32 30 3d 4c 25 0d 02 | 08 13 20 74 65 78 74 24 |!20=L%..|.. text$|
|000006e0| 3d c4 4c 25 2c 22 20 22 | 29 0d 02 12 19 20 f4 49 |=.L%," "|).... .I|
|000006f0| 46 20 77 25 3c 32 30 20 | 54 48 45 4e 20 77 25 3d |F w%<20 |THEN w%=|
|00000700| 32 30 0d 02 1c 05 cc 0d | 02 26 14 20 e7 c0 74 65 |20......|.&. ..te|
|00000710| 78 74 24 2c 31 29 3d 22 | 21 22 8c 0d 02 30 1c 20 |xt$,1)="|!"...0. |
|00000720| 20 74 65 78 74 24 3d c2 | 74 65 78 74 24 2c a9 74 | text$=.|text$,.t|
|00000730| 65 78 74 24 2d 31 29 0d | 02 3a 14 20 20 21 6d 65 |ext$-1).|.:.  !me|
|00000740| 6e 75 70 74 72 25 2b 3d | 26 30 38 0d 02 44 06 20 |nuptr%+=|&08..D. |
|00000750| cd 0d 02 4e 11 20 e7 a9 | 74 65 78 74 24 3c 3d 31 |...N. ..|text$<=1|
|00000760| 32 8c 0d 02 58 1a 20 20 | 24 28 6d 65 6e 75 70 74 |2...X.  |$(menupt|
|00000770| 72 25 2b 31 32 29 3d 74 | 65 78 74 24 0d 02 62 28 |r%+12)=t|ext$..b(|
|00000780| 20 cc 20 49 25 3d a4 77 | 6f 72 6b 73 70 61 63 65 | . I%=.w|orkspace|
|00000790| 28 a9 74 65 78 74 24 2b | 31 29 3a 24 49 25 3d 74 |(.text$+|1):$I%=t|
|000007a0| 65 78 74 24 0d 02 6c 38 | 20 20 6d 65 6e 75 70 74 |ext$..l8|  menupt|
|000007b0| 72 25 21 31 32 3d 49 25 | 3a 6d 65 6e 75 70 74 72 |r%!12=I%|:menuptr|
|000007c0| 25 21 31 36 3d 2d 31 3a | 6d 65 6e 75 70 74 72 25 |%!16=-1:|menuptr%|
|000007d0| 21 32 30 3d a9 74 65 78 | 74 24 2b 31 0d 02 76 22 |!20=.tex|t$+1..v"|
|000007e0| 20 20 6d 65 6e 75 70 74 | 72 25 21 38 3d 6d 65 6e |  menupt|r%!8=men|
|000007f0| 75 70 74 72 25 21 38 20 | 84 20 26 31 30 30 0d 02 |uptr%!8 |. &100..|
|00000800| 80 06 20 cd 0d 02 8a 19 | e7 a9 74 65 78 74 24 3e |.. .....|..text$>|
|00000810| 77 25 20 8c 77 25 3d a9 | 74 65 78 74 24 0d 02 94 |w% .w%=.|text$...|
|00000820| 05 cd 0d 02 9e 10 6d 65 | 6e 75 70 74 72 25 2b 3d |......me|nuptr%+=|
|00000830| 32 34 0d 02 a8 05 e1 0d | 02 b2 05 3a 0d 02 bc 20 |24......|...:... |
|00000840| dd a4 77 6f 72 6b 73 70 | 61 63 65 28 4c 25 29 3a |..worksp|ace(L%):|
|00000850| de 20 4c 25 20 4c 25 3a | 3d 20 4c 25 0d 02 c6 05 |. L% L%:|= L%....|
|00000860| 3a 0d 02 d0 10 dd a4 6d | 70 61 72 28 73 65 70 24 |:......m|par(sep$|
|00000870| 29 0d 02 da 25 69 31 25 | 3d 69 25 2b 31 3a 69 25 |)...%i1%|=i%+1:i%|
|00000880| 3d a7 6d 65 6e 75 24 2b | 73 65 70 24 2c 73 65 70 |=.menu$+|sep$,sep|
|00000890| 24 2c 69 31 25 29 0d 02 | e4 17 3d c1 6d 65 6e 75 |$,i1%)..|..=.menu|
|000008a0| 24 2c 69 31 25 2c 69 25 | 2d 69 31 25 29 0d 02 ee |$,i1%,i%|-i1%)...|
|000008b0| 05 3a 0d 02 f8 15 dd f2 | 57 69 6d 70 54 69 63 6b |.:......|WimpTick|
|000008c0| 28 62 25 2c 6e 25 29 0d | 03 02 23 62 25 21 28 32 |(b%,n%).|..#b%!(2|
|000008d0| 38 2b 32 34 2a 6e 25 29 | 3d 62 25 21 28 32 38 2b |8+24*n%)|=b%!(28+|
|000008e0| 32 34 2a 6e 25 29 82 26 | 30 31 0d 03 0c 05 e1 0d |24*n%).&|01......|
|000008f0| 03 16 05 3a 0d 03 20 24 | dd f2 57 69 6d 70 53 65 |...:.. $|..WimpSe|
|00000900| 6c 65 63 74 28 6d 65 6e | 75 73 25 2c f8 20 6d 24 |lect(men|us%,. m$|
|00000910| 2c f8 20 62 75 74 25 29 | 0d 03 2a 2d c8 99 22 57 |,. but%)|..*-.."W|
|00000920| 69 6d 70 5f 47 65 74 50 | 6f 69 6e 74 65 72 49 6e |imp_GetP|ointerIn|
|00000930| 66 6f 22 2c 2c 62 25 2b | 36 34 3a 62 75 74 25 3d |fo",,b%+|64:but%=|
|00000940| 62 25 21 37 32 0d 03 34 | 38 c8 99 22 57 69 6d 70 |b%!72..4|8.."Wimp|
|00000950| 5f 44 65 63 6f 64 65 4d | 65 6e 75 22 2c 2c 6d 65 |_DecodeM|enu",,me|
|00000960| 6e 75 74 6f 70 25 2c 6d | 65 6e 75 73 25 2c c4 32 |nutop%,m|enus%,.2|
|00000970| 30 30 2c 22 20 22 29 b8 | 2c 2c 2c 6d 24 0d 03 3e |00," ").|,,,m$..>|
|00000980| 0f e7 20 6d 24 3d 22 22 | 20 8c 20 e1 0d 03 48 1a |.. m$=""| . ...H.|
|00000990| e7 20 6d 24 3d 22 51 75 | 69 74 22 20 f2 57 69 6d |. m$="Qu|it" .Wim|
|000009a0| 70 45 6e 64 3a e0 0d 03 | 52 05 e1 0d 03 5c 05 3a |pEnd:...|R....\.:|
|000009b0| 0d 03 66 16 dd a4 57 69 | 6d 70 45 72 72 28 74 24 |..f...Wi|mpErr(t$|
|000009c0| 29 3a ea 20 4b 25 0d 03 | 70 3e 21 62 25 3d 30 3a |):. K%..|p>!b%=0:|
|000009d0| 24 28 62 25 2b 34 29 3d | 74 24 2b bd 30 3a c8 99 |$(b%+4)=|t$+.0:..|
|000009e0| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|000009f0| 72 22 2c 62 25 2c 33 2c | 74 61 73 6b 6e 24 20 b8 |r",b%,3,|taskn$ .|
|00000a00| 20 2c 4b 25 0d 03 7a 07 | 3d 4b 25 0d 03 84 05 3a | ,K%..z.|=K%....:|
|00000a10| 0d 03 8e 12 dd f2 57 69 | 6d 70 53 74 6f 70 3a ee |......Wi|mpStop:.|
|00000a20| 85 87 0d 03 98 1e c8 99 | 22 57 69 6d 70 5f 44 72 |........|"Wimp_Dr|
|00000a30| 61 67 42 6f 78 22 2c 2c | 2d 31 3a 21 62 25 3d 9f |agBox",,|-1:!b%=.|
|00000a40| 0d 03 a2 37 e7 20 9f 3e | 35 32 20 24 28 62 25 2b |...7. .>|52 $(b%+|
|00000a50| 34 29 3d f6 24 2b bd 30 | 20 8b 20 24 28 62 25 2b |4)=.$+.0| . $(b%+|
|00000a60| 34 29 3d f6 24 2b 22 20 | 61 74 20 6c 69 6e 65 20 |4)=.$+" |at line |
|00000a70| 22 2b c3 9e 2b bd 30 0d | 03 ac 24 c8 99 22 57 69 |"+..+.0.|..$.."Wi|
|00000a80| 6d 70 5f 52 65 70 6f 72 | 74 45 72 72 6f 72 22 2c |mp_Repor|tError",|
|00000a90| 62 25 2c 31 2c 74 61 73 | 6b 6e 24 0d 03 b6 0e f2 |b%,1,tas|kn$.....|
|00000aa0| 57 69 6d 70 45 6e 64 3a | e0 0d 03 c0 05 3a 0d 03 |WimpEnd:|.....:..|
|00000ab0| ca 2c dd f2 4f 70 65 6e | 57 69 6e 28 68 25 2c 78 |.,..Open|Win(h%,x|
|00000ac0| 6c 25 2c 79 6c 25 2c 78 | 68 25 2c 79 68 25 2c 78 |l%,yl%,x|h%,yh%,x|
|00000ad0| 6f 25 2c 79 6f 25 2c 66 | 25 29 0d 03 d4 4d 21 62 |o%,yo%,f|%)...M!b|
|00000ae0| 25 3d 68 25 3a 62 25 21 | 34 3d 78 6c 25 3a 62 25 |%=h%:b%!|4=xl%:b%|
|00000af0| 21 38 3d 79 6c 25 3a 62 | 25 21 31 32 3d 78 68 25 |!8=yl%:b|%!12=xh%|
|00000b00| 3a 62 25 21 31 36 3d 79 | 68 25 3a 62 25 21 32 30 |:b%!16=y|h%:b%!20|
|00000b10| 3d 78 6f 25 3a 62 25 21 | 32 34 3d 79 6f 25 3a 62 |=xo%:b%!|24=yo%:b|
|00000b20| 25 21 32 38 3d 66 25 0d | 03 de 1b c8 99 22 57 69 |%!28=f%.|....."Wi|
|00000b30| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|00000b40| 62 25 0d 03 e8 05 e1 0d | 03 f2 05 3a 0d 03 fc 19 |b%......|...:....|
|00000b50| dd f2 43 6c 6f 73 65 57 | 69 6e 28 77 25 29 3a 21 |..CloseW|in(w%):!|
|00000b60| 62 25 3d 77 25 0d 04 06 | 1c c8 99 22 57 69 6d 70 |b%=w%...|..."Wimp|
|00000b70| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|00000b80| 25 0d 04 10 05 e1 0d 04 | 1a 05 3a 0d 04 24 17 dd |%.......|..:..$..|
|00000b90| f2 44 65 6c 57 69 6e 28 | 77 25 29 3a 21 62 25 3d |.DelWin(|w%):!b%=|
|00000ba0| 77 25 0d 04 2e 1d c8 99 | 22 57 69 6d 70 5f 44 65 |w%......|"Wimp_De|
|00000bb0| 6c 65 74 65 57 69 6e 64 | 6f 77 22 2c 2c 62 25 0d |leteWind|ow",,b%.|
|00000bc0| 04 38 05 e1 0d 04 42 05 | 3a 0d 04 4c 14 dd f2 52 |.8....B.|:..L...R|
|00000bd0| 65 66 72 65 73 68 57 69 | 6e 28 77 25 29 0d 04 56 |efreshWi|n(w%)..V|
|00000be0| 0b ea 20 58 25 2c 59 25 | 0d 04 60 26 21 62 25 3d |.. X%,Y%|..`&!b%=|
|00000bf0| 77 25 3a c8 99 22 57 69 | 6d 70 5f 47 65 74 57 69 |w%:.."Wi|mp_GetWi|
|00000c00| 6e 64 6f 77 53 74 61 74 | 65 22 2c 2c 62 25 0d 04 |ndowStat|e",,b%..|
|00000c10| 6a 1f 58 25 3d 62 25 21 | 31 32 2d 62 25 21 34 3a |j.X%=b%!|12-b%!4:|
|00000c20| 59 25 3d 62 25 21 31 36 | 2d 62 25 21 38 0d 04 74 |Y%=b%!16|-b%!8..t|
|00000c30| 37 62 25 21 34 3d 62 25 | 21 32 30 3a 62 25 21 38 |7b%!4=b%|!20:b%!8|
|00000c40| 3d 62 25 21 32 34 2d 59 | 25 3a 62 25 21 31 32 3d |=b%!24-Y|%:b%!12=|
|00000c50| 62 25 21 32 30 2b 58 25 | 3a 62 25 21 31 36 3d 62 |b%!20+X%|:b%!16=b|
|00000c60| 25 21 32 34 0d 04 7e 22 | c8 99 22 57 69 6d 70 5f |%!24..~"|.."Wimp_|
|00000c70| 55 70 64 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |UpdateWi|ndow",,b|
|00000c80| 25 20 b8 20 5a 25 0d 04 | 88 2d c8 95 20 5a 25 3c |% . Z%..|.-.. Z%<|
|00000c90| 3e 30 3a c8 99 22 57 69 | 6d 70 5f 47 65 74 52 65 |>0:.."Wi|mp_GetRe|
|00000ca0| 63 74 61 6e 67 6c 65 22 | 2c 2c 62 25 20 b8 20 5a |ctangle"|,,b% . Z|
|00000cb0| 25 3a ce 0d 04 92 05 e1 | 0d 04 9c 05 3a 0d 04 a6 |%:......|....:...|
|00000cc0| 1c dd f2 57 69 6d 70 53 | 45 28 77 25 2c 41 25 2c |...WimpS|E(w%,A%,|
|00000cd0| 42 25 2c 43 25 2c 44 25 | 29 0d 04 b0 3c 21 62 25 |B%,C%,D%|)...<!b%|
|00000ce0| 3d 41 25 3a 62 25 21 34 | 3d 42 25 3a 62 25 21 38 |=A%:b%!4|=B%:b%!8|
|00000cf0| 3d 43 25 3a 62 25 21 31 | 32 3d 44 25 3a c8 99 22 |=C%:b%!1|2=D%:.."|
|00000d00| 57 69 6d 70 5f 53 65 74 | 45 78 74 65 6e 74 22 2c |Wimp_Set|Extent",|
|00000d10| 77 25 2c 62 25 0d 04 ba | 05 e1 0d 04 c4 05 3a 0d |w%,b%...|......:.|
|00000d20| 04 ce 16 dd f2 57 69 6d | 70 4e 65 77 54 69 74 6c |.....Wim|pNewTitl|
|00000d30| 65 28 77 25 29 0d 04 d8 | 28 21 62 25 3d 77 25 3a |e(w%)...|(!b%=w%:|
|00000d40| c8 99 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |.."Wimp_|GetWindo|
|00000d50| 77 4f 75 74 6c 69 6e 65 | 22 2c 2c 62 25 0d 04 e2 |wOutline|",,b%...|
|00000d60| 35 c8 99 22 57 69 6d 70 | 5f 46 6f 72 63 65 52 65 |5.."Wimp|_ForceRe|
|00000d70| 64 72 61 77 22 2c 2d 31 | 2c 62 25 21 34 2c 62 25 |draw",-1|,b%!4,b%|
|00000d80| 21 31 36 2d 34 34 2c 62 | 25 21 31 32 2c 62 25 21 |!16-44,b|%!12,b%!|
|00000d90| 31 36 0d 04 ec 05 e1 0d | 04 f6 05 3a 0d 05 00 1c |16......|...:....|
|00000da0| dd f2 57 69 6d 70 49 63 | 6f 6e 54 69 63 6b 28 77 |..WimpIc|onTick(w|
|00000db0| 25 2c 69 25 2c 66 25 29 | 0d 05 0a 1e 21 62 25 3d |%,i%,f%)|....!b%=|
|00000dc0| 77 25 3a 62 25 21 34 3d | 69 25 3a 62 25 21 31 32 |w%:b%!4=|i%:b%!12|
|00000dd0| 3d 31 3c 3c 32 31 0d 05 | 14 1e e7 20 66 25 3d b9 |=1<<21..|... f%=.|
|00000de0| 20 62 25 21 38 3d 31 3c | 3c 32 31 20 8b 20 62 25 | b%!8=1<|<21 . b%|
|00000df0| 21 38 3d 30 0d 05 1e 1d | c8 99 22 57 69 6d 70 5f |!8=0....|.."Wimp_|
|00000e00| 53 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 62 |SetIconS|tate",,b|
|00000e10| 25 0d 05 28 05 e1 0d 05 | 32 05 3a 0d 05 3c 1d dd |%..(....|2.:..<..|
|00000e20| f2 57 69 6d 70 49 63 6f | 6e 53 68 61 64 65 28 77 |.WimpIco|nShade(w|
|00000e30| 25 2c 69 25 2c 66 25 29 | 0d 05 46 1e 21 62 25 3d |%,i%,f%)|..F.!b%=|
|00000e40| 77 25 3a 62 25 21 34 3d | 69 25 3a 62 25 21 31 32 |w%:b%!4=|i%:b%!12|
|00000e50| 3d 31 3c 3c 32 32 0d 05 | 50 1e e7 20 66 25 3d b9 |=1<<22..|P.. f%=.|
|00000e60| 20 62 25 21 38 3d 31 3c | 3c 32 32 20 8b 20 62 25 | b%!8=1<|<22 . b%|
|00000e70| 21 38 3d 30 0d 05 5a 1d | c8 99 22 57 69 6d 70 5f |!8=0..Z.|.."Wimp_|
|00000e80| 53 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 62 |SetIconS|tate",,b|
|00000e90| 25 0d 05 64 05 e1 0d 05 | 6e 05 3a 0d 05 78 10 dd |%..d....|n.:..x..|
|00000ea0| f2 57 69 6d 70 4f 54 28 | 54 24 29 0d 05 82 1d c8 |.WimpOT(|T$).....|
|00000eb0| 99 22 57 69 6d 70 5f 4f | 70 65 6e 54 65 6d 70 6c |."Wimp_O|penTempl|
|00000ec0| 61 74 65 22 2c 2c 54 24 | 0d 05 8c 05 e1 0d 05 96 |ate",,T$|........|
|00000ed0| 25 dd f2 57 69 6d 70 43 | 54 3a c8 99 22 57 69 6d |%..WimpC|T:.."Wim|
|00000ee0| 70 5f 43 6c 6f 73 65 54 | 65 6d 70 6c 61 74 65 22 |p_CloseT|emplate"|
|00000ef0| 3a e1 0d 05 a0 16 dd a4 | 57 69 6d 70 4c 54 28 49 |:.......|WimpLT(I|
|00000f00| 25 2c 4e 25 2c 54 24 29 | 0d 05 aa 37 c8 99 22 57 |%,N%,T$)|...7.."W|
|00000f10| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00000f20| 22 2c 2c 62 25 2c 49 25 | 2c 4e 25 2c b9 2c 54 24 |",,b%,I%|,N%,.,T$|
|00000f30| 2c 30 20 b8 20 2c 2c 4e | 25 2c 2c 2c 2c 49 25 0d |,0 . ,,N|%,,,,I%.|
|00000f40| 05 b4 6b e7 20 49 25 3d | 30 20 f2 57 69 6d 70 43 |..k. I%=|0 .WimpC|
|00000f50| 54 3a 21 62 25 3d 30 3a | 24 28 62 25 2b 34 29 3d |T:!b%=0:|$(b%+4)=|
|00000f60| 22 54 65 6d 70 6c 61 74 | 65 20 22 2b 54 24 2b 22 |"Templat|e "+T$+"|
|00000f70| 20 6e 6f 74 20 66 6f 75 | 6e 64 22 2b bd 30 3a c8 | not fou|nd"+.0:.|
|00000f80| 99 22 57 69 6d 70 5f 52 | 65 70 6f 72 74 45 72 72 |."Wimp_R|eportErr|
|00000f90| 6f 72 22 2c 62 25 2c 31 | 2c 74 61 73 6b 6e 24 3a |or",b%,1|,taskn$:|
|00000fa0| f2 57 69 6d 70 45 6e 64 | 3a e0 0d 05 be 07 3d 4e |.WimpEnd|:.....=N|
|00000fb0| 25 0d 05 c8 15 dd a4 57 | 69 6d 70 43 57 28 62 25 |%......W|impCW(b%|
|00000fc0| 29 3a ea 20 48 25 0d 05 | d2 26 c8 99 22 57 69 6d |):. H%..|.&.."Wim|
|00000fd0| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00000fe0| 2c 62 25 20 b8 20 48 25 | 3a 3d 48 25 0d 05 dc 05 |,b% . H%|:=H%....|
|00000ff0| 3a 0d 05 e6 1d dd f2 57 | 69 6d 70 53 53 61 76 65 |:......W|impSSave|
|00001000| 3a ea 20 41 25 2c 42 25 | 2c 43 25 2c 44 25 0d 05 |:. A%,B%|,C%,D%..|
|00001010| f0 30 21 62 25 3d 53 61 | 76 65 41 73 25 3a 62 25 |.0!b%=Sa|veAs%:b%|
|00001020| 21 34 3d 30 3a c8 99 22 | 57 69 6d 70 5f 47 65 74 |!4=0:.."|Wimp_Get|
|00001030| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 25 0d 05 |IconStat|e",,b%..|
|00001040| fa 31 62 25 21 33 32 3d | 53 61 76 65 41 73 25 3a |.1b%!32=|SaveAs%:|
|00001050| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |.. "Wimp|_GetWind|
|00001060| 6f 77 53 74 61 74 65 22 | 2c 2c 62 25 2b 33 32 0d |owState"|,,b%+32.|
|00001070| 06 04 3e 41 25 3d 62 25 | 21 33 36 2b 62 25 21 38 |..>A%=b%|!36+b%!8|
|00001080| 3a 42 25 3d 62 25 21 34 | 38 2b 62 25 21 31 32 3a |:B%=b%!4|8+b%!12:|
|00001090| 43 25 3d 62 25 21 33 36 | 2b 62 25 21 31 36 3a 44 |C%=b%!36|+b%!16:D|
|000010a0| 25 3d 62 25 21 34 38 2b | 62 25 21 32 30 0d 06 0e |%=b%!48+|b%!20...|
|000010b0| 26 62 25 21 38 3d 41 25 | 3a 62 25 21 31 32 3d 42 |&b%!8=A%|:b%!12=B|
|000010c0| 25 3a 62 25 21 31 36 3d | 43 25 3a 62 25 21 32 30 |%:b%!16=|C%:b%!20|
|000010d0| 3d 44 25 0d 06 18 31 62 | 25 21 32 34 3d 30 3a 62 |=D%...1b|%!24=0:b|
|000010e0| 25 21 32 38 3d 30 3a 62 | 25 21 33 32 3d 26 37 46 |%!28=0:b|%!32=&7F|
|000010f0| 46 46 46 46 46 3a 62 25 | 21 33 36 3d 26 37 46 46 |FFFFF:b%|!36=&7FF|
|00001100| 46 46 46 46 0d 06 22 1f | 62 25 21 34 3d 35 3a c8 |FFFF..".|b%!4=5:.|
|00001110| 99 22 57 69 6d 70 5f 44 | 72 61 67 42 6f 78 22 2c |."Wimp_D|ragBox",|
|00001120| 2c 62 25 0d 06 2c 05 e1 | 0d 06 36 18 dd f2 57 69 |,b%..,..|..6...Wi|
|00001130| 6d 70 44 6f 53 61 76 65 | 28 66 6e 24 2c 54 25 29 |mpDoSave|(fn$,T%)|
|00001140| 0d 06 40 1f c8 99 22 57 | 69 6d 70 5f 47 65 74 50 |..@..."W|imp_GetP|
|00001150| 6f 69 6e 74 65 72 49 6e | 66 6f 22 2c 2c 62 25 0d |ointerIn|fo",,b%.|
|00001160| 06 4a 4a 62 25 21 32 30 | 3d 31 32 38 3a 62 25 21 |.JJb%!20|=128:b%!|
|00001170| 33 32 3d 30 3a 62 25 21 | 33 36 3d 31 3a 62 25 21 |32=0:b%!|36=1:b%!|
|00001180| 34 30 3d 62 25 21 31 32 | 3a 62 25 21 34 34 3d 62 |40=b%!12|:b%!44=b|
|00001190| 25 21 31 36 3a 62 25 21 | 34 38 3d 21 62 25 3a 62 |%!16:b%!|48=!b%:b|
|000011a0| 25 21 35 32 3d 62 25 21 | 34 0d 06 54 24 62 25 21 |%!52=b%!|4..T$b%!|
|000011b0| 35 36 3d 30 3a 62 25 21 | 36 30 3d 54 25 3a 24 28 |56=0:b%!|60=T%:$(|
|000011c0| 62 25 2b 36 34 29 3d 66 | 6e 24 2b bd 30 0d 06 5e |b%+64)=f|n$+.0..^|
|000011d0| 2d c8 99 22 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 |-.."Wimp|_SendMes|
|000011e0| 73 61 67 65 22 2c 31 37 | 2c 62 25 2b 32 30 2c 62 |sage",17|,b%+20,b|
|000011f0| 25 21 34 30 2c 62 25 21 | 34 34 0d 06 68 05 e1 0d |%!40,b%!|44..h...|
|00001200| 06 72 42 dd f2 57 69 6d | 70 41 63 6b 53 61 76 65 |.rB..Wim|pAckSave|
|00001210| 3a 62 25 21 31 36 3d 33 | 3a c8 99 22 57 69 6d 70 |:b%!16=3|:.."Wimp|
|00001220| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 31 37 |_SendMes|sage",17|
|00001230| 2c 62 25 2c 62 25 21 32 | 30 2c 62 25 21 32 34 3a |,b%,b%!2|0,b%!24:|
|00001240| e1 0d 06 7c 11 dd f2 57 | 69 6d 70 41 63 6b 4c 6f |...|...W|impAckLo|
|00001250| 61 64 0d 06 86 3d 62 25 | 21 31 32 3d 62 25 21 34 |ad...=b%|!12=b%!4|
|00001260| 3a 62 25 21 31 36 3d 34 | 3a c8 99 22 57 69 6d 70 |:b%!16=4|:.."Wimp|
|00001270| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 31 37 |_SendMes|sage",17|
|00001280| 2c 62 25 2c 62 25 21 32 | 30 2c 62 25 21 32 34 0d |,b%,b%!2|0,b%!24.|
|00001290| 06 90 05 e1 0d 06 9a 05 | 3a 0d 06 a4 13 dd f2 57 |........|:......W|
|000012a0| 69 6d 70 43 6d 64 57 6f | 28 74 24 29 0d 06 ae 1d |impCmdWo|(t$)....|
|000012b0| c8 99 22 57 69 6d 70 5f | 43 6f 6d 6d 61 6e 64 57 |.."Wimp_|CommandW|
|000012c0| 69 6e 64 6f 77 22 2c 74 | 24 0d 06 b8 05 e1 0d 06 |indow",t|$.......|
|000012d0| c2 0f dd f2 57 69 6d 70 | 43 6d 64 57 63 0d 06 cc |....Wimp|CmdWc...|
|000012e0| 1c c8 99 22 57 69 6d 70 | 5f 43 6f 6d 6d 61 6e 64 |..."Wimp|_Command|
|000012f0| 57 69 6e 64 6f 77 22 2c | 30 0d 06 d6 05 e1 0d 06 |Window",|0.......|
|00001300| e0 05 3a 0d 06 ea 1f dd | f2 48 6f 75 72 4f 6e 3a |..:.....|.HourOn:|
|00001310| c8 99 22 48 6f 75 72 67 | 6c 61 73 73 5f 4f 6e 22 |.."Hourg|lass_On"|
|00001320| 3a e1 0d 06 f4 25 dd f2 | 48 6f 75 72 53 6d 61 73 |:....%..|HourSmas|
|00001330| 68 3a c8 99 22 48 6f 75 | 72 67 6c 61 73 73 5f 53 |h:.."Hou|rglass_S|
|00001340| 6d 61 73 68 22 3a e1 0d | 06 fe 05 3a 0d 07 08 14 |mash":..|...:....|
|00001350| dd a4 47 65 74 53 74 72 | 28 6e 25 29 3a ea 6e 24 |..GetStr|(n%):.n$|
|00001360| 0d 07 12 10 e7 20 3f 6e | 25 3c 33 32 20 3d 6e 24 |..... ?n|%<32 =n$|
|00001370| 0d 07 1c 23 f5 3a 6e 24 | 2b 3d bd 28 3f 6e 25 29 |...#.:n$|+=.(?n%)|
|00001380| 3a 6e 25 2b 3d 31 3a fd | 20 3f 6e 25 3c 33 32 3a |:n%+=1:.| ?n%<32:|
|00001390| 3d 6e 24 0d 07 26 13 dd | f2 50 75 74 53 74 72 28 |=n$..&..|.PutStr(|
|000013a0| 6e 24 2c 6e 25 29 0d 07 | 30 0f 6e 24 2b 3d bd 30 |n$,n%)..|0.n$+=.0|
|000013b0| 3a ea 20 49 25 0d 07 3a | 29 e3 20 49 25 3d 31 20 |:. I%..:|). I%=1 |
|000013c0| b8 20 a9 28 6e 24 29 3a | 3f 6e 25 3d 97 28 c1 6e |. .(n$):|?n%=.(.n|
|000013d0| 24 2c 49 25 29 29 3a 6e | 25 2b 3d 31 3a ed 0d 07 |$,I%)):n|%+=1:...|
|000013e0| 44 05 e1 0d 07 4e 05 3a | 0d 07 58 12 dd a4 4c 65 |D....N.:|..X...Le|
|000013f0| 61 66 28 6e 24 29 3a ea | 69 25 0d 07 62 2d 69 25 |af(n$):.|i%..b-i%|
|00001400| 3d a9 28 6e 24 29 3a c8 | 95 20 69 25 3e 30 20 80 |=.(n$):.|. i%>0 .|
|00001410| 20 c1 6e 24 2c 69 25 2c | 31 29 3c 3e 22 2e 22 3a | .n$,i%,|1)<>".":|
|00001420| 69 25 2d 3d 31 3a ce 0d | 07 6c 0e 3d c1 6e 24 2c |i%-=1:..|.l.=.n$,|
|00001430| 69 25 2b 31 29 0d ff    |                         |i%+1).. |        |
+--------+-------------------------+-------------------------+--------+--------+